home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The 640 MEG Shareware Studio 4
/
The 640 Meg Shareware Studio CD-ROM Volume IV (Data Express)(1994).ISO
/
clang
/
cenvid.zip
/
BORDER.CMM
< prev
next >
Wrap
Text File
|
1993-07-12
|
605b
|
28 lines
if defined(_WINDOWS_)
ScreenSize(30,30);
DrawAsteriskBorder();
ScreenCursor(1,1);
getch();
DrawAsteriskBorder()
{
size = ScreenSize();
ScreenClear();
// draw top border
ScreenCursor(0,0);
for ( col = 0; col < size.col; col++ )
putchar('*');
// draw bottom border
ScreenCursor(0,size.row-2);
for ( col = 0; col < size.col; col++ )
putchar('*');
// draw left and right borders
for ( row = 0; row < size.row - 1; row++ ) {
ScreenCursor(0,row);
putchar('*');
ScreenCursor(size.col-1,row);
putchar('*');
}
}